home *** CD-ROM | disk | FTP | other *** search
- #include <malloc.h>
- #include <stdlib.h>
- #include <memory.h>
- #include <string.h>
- #include <stdio.h>
- #include <include.h>
- #include <lucb.h>
-
- /*
- * All verbs which not prepared to use yet.
- *
- * CopyRight 1995. Nicholas Poljakov all rights reserved.
- *
- */
-
- struct rqb *call_appl(void *);
- extern struct lucb lu6;
-
- test(p)
- char *p;
- {
- }
- senderr(p)
- char *p;
- {
- }
- open_acb(p)
- char *p;
- {
- }
- int close_acb(pACB)
- void *pACB;
- {
-
- #if OS_TYPE == 0 /* MS_DOS */
-
- struct rqb *p_rqb;
-
- if ((p_rqb = (struct rqb *)calloc(1, sizeof(struct rqb))) == NULL) {
- return -1;
- }
- p_rqb -> th.ra.stcb = APPL_CODE;
- p_rqb -> th.ra.code = p_rqb -> th.ra.code & 0xbf; /* TOP */
- p_rqb -> th.ra.code |= 0x80; /* RQB */
- memcpy(p_rqb->th.ra.wa.area, lu6.lu_name, 8);
- p_rqb -> th.ra.rparm.parm.parm1 = 7; /* Detach_LU */
- call_appl(p_rqb);
- free( p_rqb );
- #endif
- return 0;
- }
-